home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1997 #4
/
Amiga Plus CD - 1997 - No. 04.iso
/
amigaplus_cd-rom_index
/
nr.5-6-95
< prev
next >
Wrap
Text File
|
1997-05-06
|
1KB
|
37 lines
IF NOT exists RAM:
Echo "Ohne die Ram-Disk *"RAM:*" funktioniert dieses Skript leider nicht!"
Echo "Auf jeder normalen Workbench sollte die RAM-Disk verfügbar sein."
Wait 5
Quit
ENDIF
CD AmigaPlus_CD-ROM_Nr.4-97:AmigaPlus_CD-ROM_Index
FailAt 240
Stack 30000
Set >NIL: Suchmuster ""
Set Suchmuster `AmigaPlus_CD-ROM_Nr.4-97:AmigaPlus_CD-ROM_Index/ESR "" TITLEBAR "Amiga Plus CD-ROM Index" MESSAGE "Bitte Suchbegriff eingeben:"`
IF "$Suchmuster" EQ ""
QUIT
ENDIF
Echo >RAM:Plus-CD-Temp-1 "@DATABASE Such-Guide"
Echo >>RAM:Plus-CD-Temp-1 "@REMARK Von Sandro Paolini für Amiga Plus CD Vol. 4/96"
Echo >>RAM:Plus-CD-Temp-1 "@NODE MAIN *"Gefundene Einträge auf >>$Suchmuster<<*""
Echo >>RAM:Plus-CD-Temp-1 ""
Echo >>RAM:Plus-CD-Temp-1 " Nr.| Verzeichnis"
Echo >>RAM:Plus-CD-Temp-1 "=================="
AmigaPlus_CD-ROM_Nr.4-97:AmigaPlus_CD-ROM_Index/AGrep >RAM:Plus-CD-Temp-2 -i "$Suchmuster" Index_5_6
Echo >>RAM:Plus-CD-Temp-2 "@ENDNODE"
Join RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2 TO RAM:Plus-CD-Suche.guide
Delete >NIL: RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2
Copy >NIL: FROM #?Shell#? TO RAM:
Protect RAM:Shellstart +s
Protect RAM:ShellOpen +s
Protect RAM:ShellCopy1 +s
Protect RAM:ShellCopy2 +s
Protect RAM:ShellDir1 +s
Protect RAM:ShellDir2 +s
AmigaPlus_CD-ROM_Nr.4-97:System/c/UseGuide RAM:Plus-CD-Suche.guide
Delete >NIL: RAM:Shell#? RAM:Plus-CD-Suche.guide
ENDCLI